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ENTITY FXUCHK IS 



PORT( 



S_IN 

Q_IN 

RJN 

clock 

fails 

counts 

harvests 



); 



IN std_ulogic; 
IN std_ulogic; 
IN std_ulogic; 
IN stdjjlogic; 

OUT std_ulogic_vector(0 to 1 ); 
OUT stdjjlogic vector(0 to 2); 
OUT std_ulogic~vector(0 to 1); 
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-!! BEGIN 
!! Design Entity: FXU; 
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--!! Inputs 

-US IN => B.C.S; 

--!! QJN = > A.Q; 

--!! RJN = > R; 

-!! CLOCK = > clock; 
-!! End Inputs 

--!! Fail Outputs; 

-!! 0 : "Fail message for failure event 0"; 
--!! 1 : "Fail message for failure event 1"; 
-!! End Fail Outputs; 

--!! Count Outputs; 
--!! 0 : <event0> clock; 
--!! 1 : < event 1 > clock; 
-!! 2 : <event2> clock; 
--!! End Count Outputs; 

--!! Harvest Outputs; 
-I! 0 : "Message for harvest event 0"; 
--!! 1 : "Message for harvest event 1"; 
--!! End Harvest Outputs; 

4 5 7-£ --!! End; 

ARCHITECTURE example of FXUCHK IS 

BEGIN 

... HDL code for entity body section 

END; 
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.ports for entity fsm... 



ENTITY FSM IS 
PORT( 

); 

ARCHITECTURE FSM OF FSM IS 
BEGIN 

... HDL code for FSM and rest of the entity 
fsm_state(0 to 2) < = ... Signal 801 ... 
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857 
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! Embedded FSM : examplefsm; 



! clock 

! state_vector 
! states 

! state_encoding 
! arcs 



! 
! 

! End FSM; 



(fsmclock); 
(fsm_state(0 to 2)); 
(SO, SI, S2, S3, S4); 
C000', 'OOT, '010', "01 V. '100'); 
(SO = > SO, SO = > S1. SO = > S2, 
(S1 = > S2, S1 = > S3, S2 = > S2, 
(S2 = > S3, S3 = > S4, S4 = > SO); a 
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END; 
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entity FSM : FSM 
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£^ f cour 



counts(0..1) 
^903 



$examplefsm : $examplefsm 
902^ 
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•!! Inputs f\r \ 

-!! eventj 108_in <= C.[B2.count.event_1 108]; " 
•!! eventj 124_in <= A. B.[B1 .count.eventj 1 24]; 
-!! End Inputs " ^ ' 
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■!! Inputs 

■!! event_1108_in <= C. [count. event_ 1108]; 
•I! eventj 124_in <= B. [count.eventj 1 24]; 
-!! End Inputs 
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ENTITY X IS 
PORT( 

); 

ARCHITECTURE example of X IS 
BEGIN 



HDL code for X 



1 221-< 



Y:Y 

PORT MAP< 



1222 



); 

v. 

{A < = .... 
B < = .... 
C < = .... 



1 223< 



1 230 

r\ 232 
u r1234 



END; 



--!! [count, countnameO, clock] < = Y.P,-, 
--!! Q < = Y. tB1.count.count1] AND A; 
--!! [fail, failnameO, "fail msg"] < = Q XOR B; 
--!! [harvest, harvestnameO, "harvest msg"] < = B AND C; 
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